home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / mac_file / vendor_d / neuralwa / nw2v50 / art1f1.igb < prev    next >
Text File  |  1993-08-23  |  1KB  |  61 lines
  1. inst4.1     !Sept 1, 1992
  2. !****************************************************************
  3. !*                                *
  4. !*    ART1 F1 Activity                    *
  5. !*                                *
  6. !****************************************************************
  7. !
  8.  
  9. @LLsl                !Load super-layer
  10. =n0    Lpes            !Number of layers
  11. =LayN    0
  12.  
  13. :F1Lp
  14. +LayN    1            !next layer
  15. ?LayN    n0
  16. >bgt    ART1End            !past output layer
  17. @LLly                !load the layer
  18. ?Llrn    "ART 1"            !is this an ART layer?
  19. >bne    F1Lp            !no, try again
  20. ?Lcmp    "Direct"        !is this F1 layer?
  21. >bne    F1Lp            !no, try again
  22.  
  23. ! Add probe
  24. =NPEl    LayN            !point to layer
  25. =PNam    "ART1"            !probe name
  26. @PbAS                !Add Probe
  27. @PbDC                !Delete all components
  28. @PALy                !Add Near Layer to Probe
  29.  
  30. ! Now build the instrument
  31. @ILdD                !load default instrument
  32. =ITit    "F1 Activity"        !Instrument title
  33. =IGTy    "Matrix"        !Graph Type
  34. =IGVr    "Out"            !Variable
  35. =ITTy    "RMS"            !RMS Transformation Type
  36. =ITMd    0            !No transformation
  37. =IEpc    0            !No epoch
  38.  
  39. =n0    Lpes            !#PEs in F1 layer
  40. =n1    LDnr            !#rows in display
  41.  
  42. ! standard bar graph parameters
  43. #Incl    "barparms.iif"
  44.  
  45. =Ivmn    0.0
  46. =Ivmx    1.0
  47. =ILnA    1            !Active in Learn
  48. =IRcA    1            !Active in recall
  49. =ILDv    1            !Every iteration
  50. =ILRm    0
  51. =IRDv    1            !Every recall cycle
  52. =IRRm    0
  53. =IPrb    PNam            !Point to probe
  54. =ICAc    0            !Convergence criterion inactive
  55. =ICTh    0.0            !Convergence Threshold
  56. !Let NeuralWorks figure out where to put instrument
  57. =x    0
  58. =y    0
  59. @IAdd                !Now create instrument
  60. :ART1End
  61.